home *** CD-ROM | disk | FTP | other *** search
/ Technotools / Technotools (Chestnut CD-ROM)(1993).ISO / database / dba1186 / bkev.prg < prev    next >
Text File  |  1986-10-06  |  511b  |  27 lines
  1. ERASE
  2. SET TALK OFF
  3. USE BKEV
  4. EDIT 1
  5. REPL ALL BE WITH FIX/(SEL-VAR)
  6. ERASE
  7. @ 2,1 SAY'APPLN   FIX    VAR   SEL    BE   '
  8. ?
  9. LIST OFF
  10. RETURN
  11.  
  12. RN
  13.  
  14. CASE KEY='2'
  15.      DO DEPN
  16.      CASE KEY='3'
  17.      DO MARG
  18.      CASE KEY='4'
  19.      DO BKEV
  20.      CASE KEY='5'
  21.      DO EQTF
  22.      CASE KEY='6'
  23.      RETURN
  24. ENDCASE
  25. ENDDO
  26.  
  27.